home *** CD-ROM | disk | FTP | other *** search
/ Mess With 10 / Mess With 10.iso / mac / SubMenu3.DIR / 00203_Script_203 < prev    next >
Text File  |  1996-12-18  |  474b  |  17 lines

  1. on mouseUp
  2.   set cl = the clickon
  3.   set ck = cl + 38
  4.     repeat with n = 43 to 48
  5.       if (the visible of sprite n = TRUE) then
  6.         set the visible of sprite n = FALSE
  7.         set the cursor of sprite (n - 38) = [176, 177]
  8.         exit repeat
  9.       end if
  10.     end repeat
  11.     set the visible of sprite ck = TRUE
  12.     set the cursor of sprite cl = -1
  13.     global G_BGM
  14.     set G_BGM = (ck - 42)
  15.     puppetsound "IDITTE" & string(G_BGM) & ".AIF"
  16.   end if
  17. end